home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / general / fractal / kaos.lha / fixptlib / fmap_user.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-01-15  |  258 b   |  19 lines
  1. /*
  2. ### r forward iteration of the mapping ###
  3. */
  4.  
  5. fmap_user(x,r,dim)
  6. int r,dim;
  7. double x[];
  8. {
  9.     int i,j;
  10.     extern double time,*t_v,*param;
  11.     extern int (*f_p)();
  12.  
  13.  
  14.     for(i=0;i<r;i++){
  15.         (int) f_p(t_v,1,x,param,time,dim);
  16.         for(j=0;j<dim;j++) x[j] = t_v[j];
  17.     }
  18. }
  19.